home *** CD-ROM | disk | FTP | other *** search
- object EForm: TEForm
- Left = 300
- Top = 361
- BorderStyle = bsDialog
- Caption = 'Encrypt '
- ClientHeight = 189
- ClientWidth = 409
- Color = clBtnFace
- ParentFont = True
- KeyPreview = True
- OldCreateOrder = False
- Scaled = False
- OnCreate = FormCreate
- OnKeyPress = FormKeyPress
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 8
- Top = 8
- Width = 56
- Height = 13
- Caption = '&Source File:'
- FocusControl = Edit1
- end
- object Label2: TLabel
- Left = 8
- Top = 56
- Width = 77
- Height = 13
- Caption = '&Destination File:'
- FocusControl = Edit2
- end
- object BitBtn7: TSpeedButton
- Left = 296
- Top = 24
- Width = 25
- Height = 21
- OnClick = Button1Click
- end
- object BitBtn1: TSpeedButton
- Left = 296
- Top = 72
- Width = 25
- Height = 21
- OnClick = Button2Click
- end
- object Edit1: TEdit
- Left = 8
- Top = 24
- Width = 281
- Height = 21
- ReadOnly = True
- TabOrder = 0
- Text = 'c:\test\test.lzh'
- end
- object Edit2: TEdit
- Left = 8
- Top = 72
- Width = 281
- Height = 21
- ReadOnly = True
- TabOrder = 1
- Text = 'c:\test\enc\test.enc'
- end
- object Button3: TButton
- Left = 328
- Top = 8
- Width = 75
- Height = 25
- Caption = '&Encrypt'
- Default = True
- TabOrder = 4
- OnClick = Button3Click
- end
- object Button4: TButton
- Left = 328
- Top = 40
- Width = 75
- Height = 25
- Caption = '&Cancel'
- TabOrder = 5
- OnClick = Button4Click
- end
- object Button5: TButton
- Left = 328
- Top = 72
- Width = 75
- Height = 25
- Caption = '&Help'
- TabOrder = 6
- OnClick = Button5Click
- end
- object CheckBox1: TCheckBox
- Left = 8
- Top = 168
- Width = 281
- Height = 17
- Caption = 'De&lete orginal file after encryption'
- TabOrder = 2
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 104
- Width = 281
- Height = 57
- Caption = ' &Method '
- TabOrder = 3
- object ComboBox1: TComboBox
- Left = 8
- Top = 20
- Width = 265
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- Items.Strings = (
- 'Blowfish (128-bit)'
- 'DES (64-bit)'
- 'Triple DES (128-bit)'
- 'Rijndael - AES (128-bit)')
- end
- end
- object ProgressBar1: TProgressBar
- Left = 8
- Top = 192
- Width = 393
- Height = 17
- TabOrder = 7
- end
- object AgOpenDialog: TOpenDialog
- Filter = 'All files|*.*'
- Title = 'Browse'
- Left = 328
- Top = 112
- end
- end
-